home *** CD-ROM | disk | FTP | other *** search
/ Interactive CD-ROM & Web Magazine 6 / Interactive CD-ROM & Web Magazine 6.iso / pc / imm / news / cdrom / news.dir / 00020_testo.ls < prev    next >
Encoding:
Text File  |  1996-04-04  |  485 b   |  13 lines
  1. on mouseDown
  2.   global bianco, rosso, content
  3.   set linea to the mouseLine
  4.   if linea > 0 then
  5.     set the text of field "titoletto" to line linea of field "testo"
  6.     set the foreColor of field "testo" to bianco
  7.     set the foreColor of line linea of field "testo" to rosso
  8.     set the foreColor of line linea of field "testo" to bianco
  9.     set the foreColor of line linea of field "testo" to rosso
  10.     set the text of field "contenuto" to item 2 of line linea of content
  11.   end if
  12. end
  13.